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if (flow i is newly backlogged) 


2 


r v <- i 

1 Pi 


3 


Append i to the tail of the linked list 


4 


else /* A packet of i has just been transmitted */ 


5 


pk p k-\ if 
1 1 Pi 


6 


if [F* > T Q ) 


7 


F i^ F i- T Q 


8 


Conclude visit to flow i 


9 


else 


10 


Keep servicing flow i 
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k 

F k p k-\ l { 

1 1 Pi 


2 


if (f{ > v 


3 


F t* F i- T Q 


4 


Conclude visit to flow i 


5 


else if (flow i is still backlogged) 


6 


Keep servicing flow i 
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Identify flow i currently at the head of the linked list 
Identify bundle / of flow t 
if [FF { * FRMCNT) 



FRMCNT <- -i FRMCNT 
Prepare head-of-the-queue packet for transmission 
if (oj * FRMCNT) 

a j <- FRMCNT 



FF { <- -i FRMCNT 

Extract flow i from head of linked list 
if (Flow i is still backlogged) 

Append flow i to tail of linked list 

else /* Flow i is getting idle */ 

<- ♦/ - Pi 
else if (Flow i is getting idle) 

Extract flow i from head of linked list 
<- ♦/ - Pi 
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